home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CU Amiga Super CD-ROM 21
/
CU Amiga Magazine's Super CD-ROM 21 (1998)(EMAP Images)(GB)[!][issue 1998-04].iso
/
CUCD
/
Programming
/
Python-1.4
/
Python1.4_Source
/
Modules
/
timingmodule.c
< prev
next >
Wrap
C/C++ Source or Header
|
1996-12-15
|
1KB
|
93 lines
/*
* Author: George V. Neville-Neil
*/
#include "allobjects.h"
#include "import.h"
#include "modsupport.h"
#include "ceval.h"
/* Our stuff... */
#include "timing.h"
#include "protos/timingmodule_protos.h"
static object *
start_timing(self, args)
object *self;
object *args;
{
if (!getargs(args, ""))
return NULL;
INCREF(None);
BEGINTIMING;
return None;
}
static object *
finish_timing(self, args)
object *self;
object *args;
{
if (!getargs(args, ""))
return NULL;
ENDTIMING
INCREF(None);
return None;
}
static object *
seconds(self, args)
object *self;
object *args;
{
if (!getargs(args, ""))
return NULL;
return newintobject(TIMINGS);
}
static object *
milli(self, args)
object *self;
object *args;
{
if (!getargs(args, ""))
return NULL;
return newintobject(TIMINGMS);
}
static object *
micro(self, args)
object *self;
object *args;
{
if (!getargs(args, ""))
return NULL;
return newintobject(TIMINGUS);
}
static struct methodlist timing_methods[] = {
{"start", start_timing},
{"finish", finish_timing},
{"seconds", seconds},
{"milli", milli},
{"micro", micro},
{NULL, NULL}
};
void inittiming()
{
object *m;
m = initmodule("timing", timing_methods);
}